@NullResponse @AFKOn @CallReturn(CR\End\RunEndDayCheck.txt)
@Variable[#DateDifference(PDenial, Hours)]<[PDenialSet] @NullResponse @Goto(ChastityPunishment)
@Variable[#DateDifference(TimeSinceO, Days)]>=[HardOTimeLimit] @NullResponse @Goto(HardLimit) 
@NullResponse @Goto(ChastityTest)
(HardLimit)
@NullResponse @SetDate(TimeSinceO, 0 Days)
@NullResponse @CallReturn(CR\End\HardLimit.txt)
(ChastityTest)
@NullResponse @AFKOff
@NullResponse @CheckFlag(ChastityTrainingActive)
@NullResponse @CheckFlag(ChastityIsOn)
(SelectGame)
@Flag(BeadsDeep) @NullResponse @CallReturn(CR\End\Games\BeadsDeep.txt)
@Flag(ValleyOfDarkness) @NullResponse @CallReturn(CR\End\Games\ValleyOfDarkness.txt)
@Flag(EdgeOfDesperation) @NullResponse @CallReturn(CR\End\Games\EdgeOfDesperation.txt)
@Flag(FrequentFlyer) @NullResponse @CallReturn(CR\End\Games\FrequentFlyer.txt)
@Flag(TrainingMode) @NullResponse @CallReturn(CR\End\Games\TrainingMode.txt)
@Flag(OrgasmRoulette) @NullResponse @CallReturn(CR\End\Games\OrgasmRoulette.txt)
@Flag(FinancialDomination) @NullResponse @CallReturn(CR\End\Games\FinancialDomination.txt)
@Flag(TreasureHunt) @NullResponse @CallReturn(CR\End\Games\TreasureHunt.txt)
@Flag(AuthorsGame) @NullResponse @CallReturn(CR\End\Games\AuthorsGame.txt)
@Flag(WindowOfOpportunity) @NullResponse @CallReturn(CR\End\Games\WindowOfOpportunity.txt)
@Flag(Standard) @NullResponse @CallReturn(CR\End\Games\Standard.txt)
(ChastityTrainingActive)
@NullResponse @CallReturn(CR\End\ChastityTraining\ChastityTrainingBase.txt)
(ChastityIsOn)
@Flag(CPlayActive) @NullResponse @Goto(ChastityIsOn2)
@RT(Well since you're locked #SlaveName,Now that you're under lock and key,That you're safely locked down,I'm happy that you're locked!) #DT
@RT(We're stopping now!,We're going to stop now #GNMGrin,We're at the end!) #DT @Got(Farewell)
(ChastityIsOn2)
@RT(Since you've had a session in chastity,Because this session was in chastity,Due to your chastity today) #DT
@RT(There wont any chance of any release,You wont get to to enjoy any kind of release,You can bet there wont be any form of release today!) #DT
@NullResponse @CallReturn(CR\End\ChastityOff.txt)
(ChastityPunishment)
@RT(As you well know #SlaveName,As you should well know,As is well known,Well) #DT
@RT(You're currently serving a chastity setence,You are right now being punished) #DT
@RT(So there wont be any funny business today!,So absolutely no chance of you cumming!) #DT @Goto(ChastityCheck)
**********************************************Chastity*************************************************** //If chastity is active
(ChastityCheck)
@NullResponse @CallReturn(CR\End\ChastityOn.txt)
(DenialLevel)
@NullResponse @CallReturn(CR\End\ChastityTraining\DenialLevel.txt)
(Farewell)
@NullResponse @CallReturn(CR\End\Farewell.txt)